﻿
<Serializable()> Public Class iWatchSources
    Public Sources As New List(Of iWatchSource)

    Public Sub Add(ByVal WS As iWatchSource)
        Sources.Add(WS)
    End Sub

    Public Shared Function MarkedForDeletion(ByVal WS As iWatchSource) As Boolean
        Return WS.MarkedForDeletion
    End Function


    Public Sub PurgeSourcesMarkedForDeletion()
        Sources.RemoveAll(AddressOf MarkedForDeletion)
    End Sub
    Public Sub RestartWatchers()
        For Each Source In Sources
            Source.RestartWatcher()
        Next

    End Sub

End Class
